home *** CD-ROM | disk | FTP | other *** search
/ FM Towns: Free Software Collection 7 / FM Towns Free Software Collection 7.iso / t_os / mu_tool / ln_check.awk < prev    next >
Encoding:
Text File  |  1993-11-30  |  659 b   |  26 lines
  1. /* ln_check.awk     BASIC-list line-number checker  */
  2. /*      check null lines                            */
  3. /*      check lines in illegal order                */
  4. BEGIN{
  5.     errnum=0;   /* number of error-lines            */
  6.     pl=0;       /* previous line number             */
  7.     ln=0;       /* number of lines                  */
  8. }
  9.  
  10. {
  11.     ln++
  12.     if (NF == 1){
  13.         printf("ERR:null line     in line%6d\n",ln)
  14.         errnum += 1
  15.     }
  16.     else if (pl >= $1){
  17.         printf("ERR:illegal order in line%6d(%6d -> %6d)\n",ln,pl,$1)
  18.         errnum += 1
  19.     }
  20.     pl = $1
  21. }
  22.  
  23. END{
  24.     printf("Number of errors:%d\n",errnum);
  25. }
  26.